home *** CD-ROM | disk | FTP | other *** search
/ Nebula 2 / Nebula Two.iso / Apps / DevTools / aa_m68k_Only / NXLogo / NXLogoLibrary / poly.lg < prev    next >
Encoding:
Text File  |  1992-07-09  |  88 b   |  8 lines
  1. to poly :side :ang :num
  2. if :num = 0 [stop]
  3. fd :side
  4. rt :ang
  5. poly :side :ang :num-1
  6. end
  7.  
  8.